function [x,k]=Mendnewton(~,~,~)
%用牛顿下山法求解非线性方程
%了表示非线性方程左端函数
%x0是选代初值，此方法是局部收敛，初值选择要恰当
% emg是精度指标
%k,u分别表示选代次数和下山因子
[f,d1]=feval(f,x0); %dl表示非线性方程f-0在xī处的%导数值，以下类同
k=1;
x(1)=x0;
x(2)=x(1)-1/d1;
while ahs(fl)>cng %控制精度
I=1;
k-k+1;
1,d1=fcval(f,x(k));
x(k+1)=x(k)-uxfl/dl; %牛顿下山迭代
+2,d27=feval(f,x(k+1))；
whilc abs(f2)>abs(fl) %保证迭代后的函数值比迭代前的%函数值小
u=u/2；
x(k+1)-x(k)-uf1/dl；%牛顿下山迭代
[[2,d2 |=feval(f，x(k+1))；
end
end